Дан одномерный массив целых чисел. Найти номера элементов, оканчивающихся цифрой 0 (известно, что такие элементы есть в массиве) — QBasic(Бейсик)

CLS
DIM k AS INTEGER
 
INPUT "Vvedite kol-vo elementov v mas: "; n
 
DIM Ar(1 TO n) AS INTEGER
RANDOMIZE TIMER
 
FOR i = 1 TO n
    Ar(i) = INT(RND * 100)
    PRINT Ar(i)
NEXT i
PRINT
FOR i = 1 TO n
    IF Ar(i) MOD 10 = 0 THEN
        PRINT "Konch. na nol': "; i
    END IF
NEXT i
END